home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1994 / MacHack 1994.toast / MacHack™ 1987-1994 / MacHack™ '90 / Other Stuff / Lookup ƒ / PatchMacApp < prev    next >
Encoding:
Text File  |  1988-05-08  |  1.2 KB  |  36 lines  |  [TEXT/MPS ]

  1. #    PatchMacApp - modify MacApp's UPrinting unit for CreateDeclarationIndex
  2. #
  3. #    Usage:
  4. #        PatchMacApp
  5. #
  6. #    CreateDeclarationIndex does not care about compiler options. Therefore it
  7. #    cannot handle units where a syntactic structure is opened or closed inside
  8. #    an $IFC branch. PatchMacApp corrects the only unit I know that features
  9. #    this problem - the UPrinting unit of MacApp 1.1.1.
  10. #
  11. #    Copyright Norbert Lindenberg 1988
  12. #    All rights reserved.
  13.  
  14. confirm "This script has been tested for MacApp 1.1.1 only.∂
  15.         ∂nAre you sure about using it?" || Exit 1
  16. Target "{SrcMacApp}UPrinting.p" ≥ Dev:Null || ∂
  17.     ( Alert -s 'Could not find UPrinting.' ; ∂
  18.       Exit 1)
  19. ( Find • && Find /PrintTraps;/ && Find /MacPrint;/ ) || ∂
  20.     ( Alert -s "PatchMacApp seems not to be applicable to your UPrinting unit.∂
  21.                 ∂n∂nNothing changed." ; ∂
  22.       Exit 1)
  23. ( Find • && ∂
  24.   Find /•≈'MacApp.LOAD}'/:!1 && ∂
  25.   Cut § && ∂
  26.   Find /'{$ENDC}'/Δ!1 && ∂
  27.   Paste § && ∂
  28.   Find • && ∂
  29.   Replace /PrintTraps;/ 'PrintTraps,' && ∂
  30.   Replace /MacPrint;/ 'MacPrint,' && ∂
  31.   Replace /UMacApp,/ 'UMacApp;' ) || ∂
  32.     ( Alert -s "Patch failed.∂n∂
  33.                 ∂nUPrinting may have been modified, but has not been saved.";∂
  34.       Exit 1)
  35. Close -y
  36.